Απλή είσοδος/έξοδος στην Mathematica

a=Integrate[x Sin[x], x]

dice=RandomInteger[{1,6},15]

f[0]:=1;
f[x_]:=Sin[x]/x

Directory[]

SetDirectory["D:/user/uoi/nbs"]

Directory[]

Save["file1.txt", a,dice, f]

FilePrint["file1.txt"]

a>>file2.txt

FilePrint["file2.txt"]

a=.;dice=.;f=.

a

dice

f

<<file1.txt

a

dice

?f

expr=D[Cos[x]Sin[x]/x^2,{x,2}]

expr//OutputForm

expr//FullForm

expr//FortranForm

expr//CForm

expr//TeXForm

expr//InputForm

FortranForm[expr]>>file3.txt

FilePrint["file3.txt"]

Print[expr]

?Print

Input[]

?Input

?InputString